home *** CD-ROM | disk | FTP | other *** search
/ Aminet 1 (Walnut Creek) / Aminet - June 1993 [Walnut Creek].iso / aminet / dev / lang / pcq12b.lzh / Include / Devices / GamePort.i < prev    next >
Text File  |  1990-10-01  |  990b  |  54 lines
  1. {
  2.     GamePort.i for PCQ Pascal
  3.  
  4.     GamePort device command definitions
  5. }
  6.  
  7. {$I "Include:Exec/IO.i"}
  8.  
  9. const
  10.  
  11. {*****     GamePort commands *****}
  12.  
  13.     GPD_READEVENT    = CMD_NONSTD + 0;
  14.     GPD_ASKCTYPE    = CMD_NONSTD + 1;
  15.     GPD_SETCTYPE    = CMD_NONSTD + 2;
  16.     GPD_ASKTRIGGER    = CMD_NONSTD + 3;
  17.     GPD_SETTRIGGER    = CMD_NONSTD + 4;
  18.  
  19. {*****     GamePort structures *****}
  20.  
  21. { gpt_Keys }
  22.  
  23.     GPTB_DOWNKEYS    = 0;
  24.     GPTF_DOWNKEYS    = 1;
  25.     GPTB_UPKEYS        = 1;
  26.     GPTF_UPKEYS        = 2;
  27.  
  28. type
  29.  
  30.     GamePortTrigger = record
  31.     gpt_Keys    : Short;    { key transition triggers }
  32.     gpt_Timeout    : Short;    { time trigger (vertical blank units) }
  33.     gpt_XDelta    : Short;    { X distance trigger }
  34.     gpt_YDelta    : Short;    { Y distance trigger }
  35.     end;
  36.  
  37.  
  38. const
  39.  
  40. {***** Controller Types *****}
  41.  
  42.     GPCT_ALLOCATED    = -1;    { allocated by another user }
  43.     GPCT_NOCONTROLLER    = 0;
  44.  
  45.     GPCT_MOUSE        = 1;
  46.     GPCT_RELJOYSTICK    = 2;
  47.     GPCT_ABSJOYSTICK    = 3;
  48.  
  49.  
  50. {***** Errors *****}
  51.  
  52.     GPDERR_SETCTYPE    = 1;    { this controller not valid at this time }
  53.  
  54.